home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 01p3.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-08  |  1.8 KB  |  64 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie
  3.   gKnobSprite = 14
  4.   gSendMovie = "01p3"
  5.   setUpKnob()
  6.   puppetSprite(48, 1)
  7.   set the mouseDownScript to EMPTY
  8.   set the mouseUpScript to EMPTY
  9. end
  10.  
  11. on idle
  12.   global gCursorReady
  13.   if gCursorReady = 1 then
  14.     cursor(200)
  15.     checkCursors()
  16.     set the locH of sprite 48 to the mouseH
  17.     set the locV of sprite 48 to the mouseV
  18.     updateStage()
  19.   end if
  20. end
  21.  
  22. on checkCursors
  23.   global gMagCursor
  24.   set the castNum of sprite 48 to the number of member "curs1"
  25.   if the castNum of sprite 5 and rollOver(5) then
  26.     set the castNum of sprite 48 to the number of member gMagCursor
  27.   end if
  28.   if the castNum of sprite 6 and rollOver(6) then
  29.     set the castNum of sprite 48 to the number of member gMagCursor
  30.   end if
  31.   if the castNum of sprite 7 and rollOver(7) then
  32.     set the castNum of sprite 48 to the number of member gMagCursor
  33.   end if
  34.   if the castNum of sprite 8 and rollOver(8) then
  35.     set the castNum of sprite 48 to the number of member "deMagCursor"
  36.   end if
  37.   repeat with i = 15 to 17
  38.     if rollOver(i) then
  39.       set the castNum of sprite 48 to the number of member "hotCursor"
  40.     end if
  41.   end repeat
  42.   repeat with i = 19 to 22
  43.     if the castNum of sprite i and rollOver(i) then
  44.       set the castNum of sprite 48 to the number of member "hotCursor"
  45.     end if
  46.   end repeat
  47.   if the castNum of sprite 26 and rollOver(26) then
  48.     set the castNum of sprite 48 to the number of member "linkCurs"
  49.   end if
  50.   repeat with i = 30 to 32
  51.     if rollOver(i) then
  52.       set the castNum of sprite 48 to the number of member "hotCursor"
  53.     end if
  54.   end repeat
  55.   repeat with i = 40 to 42
  56.     if rollOver(i) then
  57.       set the castNum of sprite 48 to the number of member "hotCursor"
  58.     end if
  59.   end repeat
  60.   if the castNum of sprite 47 and rollOver(47) then
  61.     set the castNum of sprite 48 to the number of member "hotCursor"
  62.   end if
  63. end
  64.